home *** CD-ROM | disk | FTP | other *** search
- object frmWallpaper: TfrmWallpaper
- Left = 190
- Top = 105
- Width = 635
- Height = 475
- BorderIcons = [biSystemMenu, biMaximize]
- Caption = 'View as Wallpaper'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- OldCreateOrder = False
- Position = poDefault
- WindowState = wsMaximized
- OnClose = FormClose
- OnDestroy = FormDestroy
- PixelsPerInch = 96
- TextHeight = 13
- object pnlButtons: TPanel
- Left = 538
- Top = 0
- Width = 89
- Height = 448
- Align = alRight
- BevelOuter = bvNone
- TabOrder = 0
- object lblCustom: TLabel
- Left = 7
- Top = 5
- Width = 35
- Height = 13
- Caption = 'Custom'
- end
- object lblX: TLabel
- Left = 41
- Top = 23
- Width = 7
- Height = 13
- Caption = 'X'
- end
- object btn800x600: TButton
- Left = 7
- Top = 106
- Width = 75
- Height = 25
- Caption = '800x600'
- TabOrder = 0
- OnClick = btn800x600Click
- end
- object btn1024x768: TButton
- Left = 7
- Top = 133
- Width = 75
- Height = 25
- Caption = '1024x768'
- TabOrder = 1
- OnClick = btn1024x768Click
- end
- object btn1280x1024: TButton
- Left = 7
- Top = 160
- Width = 75
- Height = 25
- Caption = '1280x1024'
- TabOrder = 2
- OnClick = btn1280x1024Click
- end
- object btn1600x1200: TButton
- Left = 7
- Top = 187
- Width = 75
- Height = 25
- Caption = '1600x1200'
- TabOrder = 3
- OnClick = btn1600x1200Click
- end
- object btn640x480: TButton
- Left = 7
- Top = 79
- Width = 75
- Height = 25
- Caption = '640x480'
- TabOrder = 4
- OnClick = btn640x480Click
- end
- object btn3000x2250: TButton
- Left = 7
- Top = 214
- Width = 75
- Height = 25
- Caption = '3000x2250'
- TabOrder = 5
- OnClick = btn3000x2250Click
- end
- object edtCustWidth: TEdit
- Left = 7
- Top = 20
- Width = 34
- Height = 21
- TabOrder = 6
- Text = '768'
- end
- object edtCustHeight: TEdit
- Left = 48
- Top = 20
- Width = 34
- Height = 21
- TabOrder = 7
- Text = '576'
- end
- object btnSetCustom: TButton
- Left = 7
- Top = 45
- Width = 75
- Height = 25
- Caption = 'Set Custom'
- TabOrder = 8
- OnClick = btnSetCustomClick
- end
- object pnlClose: TPanel
- Left = 0
- Top = 408
- Width = 89
- Height = 40
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 9
- object btnOK: TButton
- Left = 8
- Top = 10
- Width = 75
- Height = 25
- Caption = 'Close'
- Default = True
- TabOrder = 0
- OnClick = btnOKClick
- end
- end
- object btn1920x1200: TButton
- Left = 7
- Top = 253
- Width = 75
- Height = 25
- Caption = '1920x1200'
- TabOrder = 10
- OnClick = btn1920x1200Click
- end
- object btn3200x1200: TButton
- Left = 7
- Top = 280
- Width = 75
- Height = 25
- Caption = '3200x1200'
- TabOrder = 11
- OnClick = btn3200x1200Click
- end
- object btn2560x1024: TButton
- Left = 7
- Top = 307
- Width = 75
- Height = 25
- Caption = '2560x1024'
- TabOrder = 12
- OnClick = btn2560x1024Click
- end
- end
- object sbxWall: TScrollBox
- Left = 0
- Top = 0
- Width = 538
- Height = 448
- HorzScrollBar.Smooth = True
- HorzScrollBar.Tracking = True
- VertScrollBar.Smooth = True
- VertScrollBar.Tracking = True
- Align = alClient
- Color = clAppWorkSpace
- ParentColor = False
- TabOrder = 1
- object tilWall: TTileImage
- Left = 0
- Top = 0
- Width = 1600
- Height = 1200
- TileImage = True
- end
- end
- end
-